Ì € 2
main
[mnemonic]
&(T)TDRU[tdru]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L tdru
active 1 YN L &(T)TDRU[tdru]|0
branch 0 FREE L VAL=IF{@Z.lastkey=@Z.special.fcn @Z.enter^@Z.lastkey,I
VAL=F{@.new @Z.bell^#;%PHA.U.branch(@Pgm.trans("%PHA.R
VAL=ULE.ee.S"),@Pgm.trans("%PHA.RULE.file"))^@.new^@.n
VAL=ew.ext ""^@.old^@.old.ext;@Z.dummy.key^@Z.lastkey}
VAL=}
data.fields.from 10 CHOICE L &(T)TDRU[tdru]|3
description 30 FREE L &(T)TDRU[tdru]|1
last.update 30 FREE L &(T)TDRU[tdru]UPD
macro.name 25 FREE L &(T)TDRU[tdru]|6
physical.name 60 FREE L &(T)TDRU[tdru]|4
proc.name 40 FREE L &(T)TDRU[tdru]|5
program.name 60 FREE L &(T)TDRU[tdru]|2
urn 10 FREE L
Ì € 2
evaluations
[mnemonic, evaluate]
&(T)TDRU[tdru]E[tdruE]
Field Name Len Dat Typ J DPM Offset/Local/VAL
evaluate 6 CHOICE L tdruE
Ì € 2
formula
[mnemonic, formula.q]
&(T)TDRU[tdru]F[tdruq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
formula.q 2 PINT R tdruq
formula.line 80 TEXT L &(T)TDRU[tdru]F[tdruq]
Ì € 2
translated.formula
[mnemonic, translated.formula.q]
&(T)TDRU[tdru]TF[tdruT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
translated.formula.q 3 PINT R tdruT
translated.formula.line 150 FREE L &(T)TDRU[tdru]TF[tdruT]
|
|
| |